﻿
''' <summary>
''' Represents a concatenation of two regular expressions 
''' </summary>
''' <remarks></remarks>
Public NotInheritable Class Concatenation
    Inherits RegularExpression

    Public Sub New(ByVal left As RegularExpression, ByVal right As RegularExpression)
        MyBase.New(RegularExpressionType.Concatenation)
        CodeContract.RequiresArgumentNotNull(left, "left")
        CodeContract.RequiresArgumentNotNull(right, "right")

        m_left = left
        m_right = right
    End Sub

    Private m_left As RegularExpression
    Public ReadOnly Property Left() As RegularExpression
        Get
            Return m_left
        End Get
    End Property

    Private m_right As RegularExpression
    Public ReadOnly Property Right() As RegularExpression
        Get
            Return m_right
        End Get
    End Property

End Class
